home *** CD-ROM | disk | FTP | other *** search
/ Shocking The Web CD-ROM / SHOCK_CD.ISO / mac / Chapter Tutorials / ch07.Authoring / CommandDemos / GoToNetPage.dir / 00006_scripts.txt < prev    next >
Encoding:
Text File  |  1996-10-22  |  426 b   |  13 lines
  1. -- the following script is in the button.
  2. -- the gNetFlag global boolean can be used bu other
  3. -- scripts to see if a network operation is in progress.
  4.  
  5. on mouseUp
  6.   global gNetFlag
  7.   set the itemDelimiter = ","
  8.   if the number of items in field "argument" >= 2 then
  9.     GoToNetPage item 1 of field "argument", ¬¨
  10.                 item 2 of field "argument"
  11.   else GoToNetPage the text of field "argument"
  12.   set gNetFlag = 1
  13. end